home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 033a / qgen20.zip / SAMPLE-A.Q-A < prev    next >
Text File  |  1990-07-30  |  1KB  |  44 lines
  1. PostInfo
  2. ClearScreen
  3. ChangeColor 11 0
  4. Display "                              * * * SAMPLE-A * * |"
  5. Display "                           Using the `Ask User` style|"
  6. Display "                       PROVIDED BY COMPUTER GROUP,LTD(tm)|"
  7. Display "|"
  8. ChangeColor 4 0
  9. Display "                                        ["
  10. ChangeColor 7 0
  11. Display "-"
  12. ChangeColor 4 0
  13. Display "]|"
  14. ChangeColor 11 0
  15. Display "Have you used Software Package #1(y/n)?? "
  16. Ask 01 1
  17. Display "|"
  18. ChangeColor 4 0
  19. Display "                                         ["
  20. ChangeColor 7 0
  21. Display "-"
  22. ChangeColor 4 0
  23. Display "]|"
  24. ChangeColor 11 0
  25. Display "If yes, Do you rate it G)ood  or  B)ad ?? "
  26. Ask 01 2
  27. Display "|"
  28. ClearScreen
  29. Display "             Used??? "
  30. ListAnswer 1
  31. Display "                Rate "
  32. ListAnswer 2
  33. ChangeColor 11 0
  34. Display "|Save these answers (Y/N)? "
  35. GetChoice YN 20
  36. If 20 = "Y"
  37. OutputAnswer "             Used??? " 1
  38. OutputAnswer "                Rate " 2
  39. EndIf
  40. Quit
  41. ;
  42. ; Created using QuestGen v2.0, Copyright (C) 1990 RodentWare
  43. ;
  44.